home *** CD-ROM | disk | FTP | other *** search
/ Network CD 1 / Network CD.iso / ncomm / scripts / clock.script next >
Text File  |  1993-04-24  |  275b  |  12 lines

  1. ;NComm script that demonstrates the STRPART function
  2.  
  3. SET $stoptime = "14:00:00"
  4.  
  5. REPEAT
  6.     SET $varin = $date
  7.     STRPART $varout "11" "8" $varin    ;Numbers without quotes are also OK
  8.     MESSAGE $varout"\r"
  9.     DELAY 1
  10. UNTIL $varout == $stoptime
  11. MESSAGE "\t --- Reached StopTime\n";
  12.